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Numbers followed by ' are octal; 
by . are decimal * 



numbers f o\ 1 owed 



MACTAP 1 5 a set of PDP-6 subroutines to read and write 
OECtape In the MAC file format (see MAOM-no). Pro*ranmer* 
can call these subroutines for Input or output nf ASCII 
data, which will be compatible with TECH files; or for 
binary (36. -hit word) data. They were extracted i-mlnly from 
PDP-6 TECO and arranged and checked out In thnir present 
form by Jack Holloway. 



The file MACTAP Is on the MACPMP SYSTEM tape as n 
relocatable binary file, so any program to call It must also 
be relocatable. When loadinr with the linking louder, v 
must be taken that MACTAP Is loaded gflai 
Instance, one's main prorran) In which are 
the following symbols: 



file (for 
defined is rlohal 



aQCumul ator 
pointer 



always 



CO 



ntal nine 



pushdown 



TAPAC an accumulator. Arguments are 

TAPAC and TAPAOl; also MACTAP uses 
and TAPAC+3. Hence 1STAPACSU 1 . 



transferred I n 
TAPAC+7 



TPCHN 



PI channel npnbcr O to 5) for Data Control. 
A low number is preferable hecause the P.C 
requires fast service. 



PAfiE ? 



TPCHNA 2J)8 , *~ <-TPCHN > ; I.e. the 

for TPCHN. 



Active bit 



PCHCHN PI channel number for 

be lower priori ty (hi J 



DEC tape control , shoul d 
her number) than TPCHN. 



APRCHN 



PI channel 
should be h 



number ass i gned to processor 
gher number than PCHCHN* 



NDIR number of f I le 

slmul tanously. 
wl thin MACTAP, 



dl rector les al lowed I n core 
Each takes 200 ■ registers 



NURBUF number of DFCtape Read Buffers. Each takes 

200 f registers In MACTAP. Reasonable values 

range 2£ NURRUF£7. 

+ * 

NUWRUF number of DECtape Write Buffers. Treated 

like NURBUF. If one Intends only to read* 

DECtape and not write, NUWBUF :nay be set to 
0, and vice versa for NUR°UF t 



BLKSPC minimum Interblock space when writing* When 

stopping and starting, a DECtape wl 1 1 coast 
over two or nore blocks* However, to 

ml n I ml re start -stop, for ward -backward 

operation of a tape, MACTAP will keep It 
moving for a while In hope that the calling 
program will be ready to output another Mock 
before it has passed over RIKSPC blocks. In 
practice, 3£RLKSPC£8. has been observed. 






QUITFF 



The u 
a loc 
for t 
non-z 
unles 
featu 
In an 
may c 
actlv 
rout I 
from 
rout 1 
Inter 
was f 
shoul 



ser mus 
at ton w 
he con 
ero, I 
s the 
re in h 
Interr 
hoose t 
I ties, 
ne must 
Wl thi 
nej, 
rupt lo 
rom th 
d be 



t define QUI 
i thin his p 
tents of t 
t need not b 
user wl shes 
I % program, 
upt-servlce 
6 Immediate) 
In such a 
ascertai n w 
rv MACTAP ( 
which Is i 
C £UFPNTR". 
s area, the 
set to 



TFF as th 
rogram, 
hat loca 
e cons I de 

to hav 
I .e. a iie 
rout I ne 
y cease 

case, 

hether It 

pxc ludl np 

ndt cated 

If th 

contents 

and th 



o address of 
and arrange 
1 1 on to be 
rod further 
c a "quit" 
ans whereby 
the program 
Its current 
the service 
I ntnrrupted 

the uwait 

by APRHRK"£ 
r. Interrupt 
of QUITFF 
v i ntorrupl 
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dismissed. Then when MACTAP 
allow a quit. It will perform 
which resets QUITFF to non-zero 
to QUITFF+1, where the user i.iay 
quit. 



Is ready to 
JSR QUITFF/ 

and transfers 
perform the 



The u 

turn 

MACTA 

progr 
break 
the C 
perfo 
Inter 
turn 
user' 
it of 



ser's 

on th 
P suh 
*PCHC 
am 

-serv 
lock 
rm JS 
rupt, 
on PC 
s pro 
f on 



program 
e PI syst 
routi nes 
HN and U0 
must se 

ice routi 
Flag enab 
R APRBRK 
with the 
Change E 
gran must 
return. 



before cal 
em and enah 
wl 1 1 enable 
■+2*TPCHN w 
t up t*0* 
ne for the 
led, and In 
11 at leas 

clock flag 
nable, and 

JSR APRKRK 



ling any MACTAP routines/ must 
le PCHCHN and APRCIIN. Thr 

TPCHH and set up locations 
hen necessary; but the user's 
+2*APRCHN/ and must have a 
APR. Also the user must have 

his APR service routine *iust 
t as often as every clock 

on. Some MACTAP routines may 
if it causes an interrupt the 

1 with it on, and should turn 



Calls to MACTAP and their Effects: 



nstruction 



return ski ps next 
I nstruction 



effect 



JSR APRBRK" 



no 



must be done In APR service 
routine at least each clock 
break; the clock flag must 
be ON 






PUSHJ P, F1LEST" 









unless no 
room for 
file dir- 
ectory 



the Current Tape Number Is 
set to the contents of TAPAr 
and the file directory for 
the tape on that unit is 
loaded 1 nto core If not 
already in 



PUSHJ P / OPNRO H 



unless 
fNe not 

found on 

current 

tape 



MACTAP Is set to read from 
the beginning of the file 
SURNHl SUBIIM2 on the Current 
Tape: the subnames are 
expected in TAPAC and TAPAC+1 
as ftlxblt left-justified, 
filled out with blanks* a 
blank subname replaced by @ . 
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PUSHJ P,OPNWR M 



see rl&ht If there Is room In the file 

directory of the Current Tape 
for an additional file, MACTAP 
prepares to write on that tape 
and ski ps on return. Other- 
wlse, no action Is taken and 
the return does not ski p. 



PUSHJ P,URE0 M 



unless 
end-of - 
file read 



The next 7-bi t character 
from the selected read file 
Is put In TAPAC. 



PUSHJ P,UWR M 



unless 
tape ful I 



The rightmost 7 hits of TAPAC 
are output as the n*>xt charar- 
ter on the write tape* 



PUSHJ P,FILE" 



If 

success- 
ful 



MACTAP output since the last 
cal I to OPNWIt or FILE Is 
organized on tape as a file 
of mode fi and name as 
supplied in TAPAC wd TAPAC+1 
(as for OPNRP), 



PUSHJ P,,URED U 



unless 
end-of- 
flle read, 
I .e, end 
of last 
block of 
file 



The next 56. -bit word from 
the selected read flip Is 
put In TAPAC. 



PUSHJ P,«UWR" 
PUSHJ P,UWAIT M 



unless 
tape' ful 1 



no 



The contents of TAPAC are 
output as the next binary 
word on the write tape. 



This delays return until all 
current VACTAP tape oo*ra- 
1 1 ons have b<*en compl eteH, 



PUSHJ P,UDELE n 



no 



In TAPAC and TAPAC+1 »ro. 
expected surnames of a file 
oh the Current Tape. It Is 
deleted fror*i the core copy 
of the file directory. A 
subsequent call to F 1 I E or 
UCLSTP (with the Current 
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Tape Number unchanged) will 
write the diminished dlrec^ 
tory out on the tape. 



PUSHJ P,TAPKIL" 



no 



The file di rectory for thf* 
tape whose number is in 
TAPAC Is deleted fro-n core 
(to make room for a new 
directory). Po tapes arc* 
changed and the Current 
Tape Number remains as it was. 



PUSHJ P,UCLSTP n 



no 



The core file directory for 
the Current Tape Is copied onto 
the tape, Thl s Is 1 nadvi sabl e 
If there may be unfiled output 
on that tape. 



The MACTAP routines are transparent to all 
except TAPAC when read Into by UREO or .UREf> 



accumulators. 



At location UFPNTR" In MACTAP Is available the address of 
the beginning of the file directory for the current tape; 
the current tape number is in UFPNTR M *2. 



To wri te a f I le, 
F I LEST 

OPNWR 
UWR or 



FILE 



TAPAC (once) 



cal 1 In order 
with the tape number In 

(should skip) 
(once) (should ski p) 
.UWR with the data In TAPAC (for each 

character or word to be written) 

(should skip each time) 
with the file name In TAPAC and TAPAC+1 

(once) (should skip) 



To read a file, call In order 

FILEST with the tape number In TAPAC (once) 

(should ski p) 
OPNRD with the file name In TAPAC and TAPAC+1 

(once) (should skip) 
UREO or .URE1> returning the data In TAPAC (for 

each character or word to be read) 

(shoud skip except at and-of-fTle) 



PAH1 6 



Re fore halting, ox i tint: 

system^ 
PUSIIJ P-UWAIT" 



to MACOMP, shutting, off 
etc * 



the Pi 



Roarlins ar viritlnp a file of 
recommended. Notice that in 
true end-of-file mai 



mixed ASCII and binary 
the binary mode there 
rk y so the user ■ s program 
write a binary forriat containing its own 
end-test faci 1 i ty. 



s not 

1 5 no 

should read and 

word count or 



Global Symbols User nust Define Global 



P 

TAPAC 

TPCHH 

TPCHNA 

PCHCHN 

APRCHN 



NDIR 
NURBUF 

NUV1RUF 
BLKSPC 
QUITFF 



ymhols Pefl 


ne«) In MACTAP 


ftP:;P.itK 


UWA 1 T 


uitpn 


UfiF.LE 


UHR 


TAPKIt 


.UREP 


UCLSTP 


.UWR 


FILf 


OPNMR 


F1LFST 


OPM HO 


UPPNTR 



1 



